home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C64'er
/
C64'er.iso
/
87xx
/
8705.d64
/
lies mich!
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1995-03-30
|
2KB
|
47 lines
1 POKE 53280,0 :POKE 53281,11:PRINT CHR$(14 )CHR$(147);
2 PRINT"[204]IEBER [204]ESER!"SPC(17)"64'ER 5/87";
3 PRINT"-------------
4 [153]" aUF DIESER dISKETTE FINDEN sIE ALLE";
5 [153]"lISTINGS AUS DEM 64'ER sTAMMEFT 5/87.
6 PRINT" wENN ZU EINEM aRTIKEL MEHRERE pROGRAMME";
7 PRINT"GEHOEREN, SIND DIESE IM iNHALTSVERZEICH-";
8 PRINT"NIS DER dISKETTE INNERHALB VON tRENN-";
9 PRINT"STRICHEN ZUSAMMENGEFASST. dIESE ENTHAL-";
10 PRINT"TEN AUCH DIE sEITENANGABE, AB DER sIE";
11 PRINT"DIE bESCHREIBUNG ZUM JEWEILIGEN pROGRAMM";
12 PRINT"FINDEN. lESEN sIE DIESE BITTE GENAU";
13 PRINT"DURCH, BEVOR sIE EIN pROGRAMM LADEN UND";
14 PRINT"STARTEN.
15 [153]" hINWEIS ZUM pROGRAMM "[199](34)"mASTER-iNDEX"[199](34)":
16 PRINT"[196]IE [196]ATEI "CHR$(34)"STEXT"CHR$(34)" MUSS DAS [197][210][211][212][197] [198]ILE";
17 PRINT"AUF EINER NEUEN dISKETTE SEIN, DA SONST";
18 PRINT"DAS pROGRAMM NICHT LAUFFAEHIG IST. wENN";
19 PRINT"sIE ALSO EINE NEUE mASTER-iNDEX-dISKETTE";
20 PRINT"ANLEGEN MOECHTEN, LADEN sIE ZUERST DAS";
21 PRINT"pROGRAMM "CHR$(34)"master-index-gen"CHR$(34)". lEGEN sIE";
22 PRINT"DANN EINE LEERE, FORMATIERTE dISKETTE IN";
23 PRINT"iHR lAUFWERK UND GEBEN sIE run EIN.
24 [153]:[153]
25 [153][166]15)"PEEKITTE <(null)VAL(null)(null)(null)(null)> DRUECKEN!";
26 [161]A$:[139]A$[179][177][199](13)[167]26
27 [151] 53280,0 :[151] 53281,11:[153] [199](14 )[199](147);
28 [153]" wENN sIE NOCH fRAGEN ZU DEN pROGRAMMEN";
29 [153]"HABEN, RUFEN sIE UNSERE 64'ER-hOTLINE";
30 [153]"AN:
31 PRINT:PRINT
32 PRINTSPC(11)"64'ER-hOTLINE
33 [153][166]9)"tEL. 089/4613-640
34 PRINT
35 PRINTSPC(10)"10:00 BIS 12:00
36 [153][166]10)"14:00 BIS 18:00
37 PRINT
38 PRINT" bITTE AUSSERHALB DER ANGEGEBENEN
39 [153][166]8)"uHRZEITEN NICHT ANRUFEN.
40 PRINT:PRINT:PRINT
41 PRINTSPC(9)"vIEL sPASS MIT DER
42 [153][166]6)"pROGRAMMSERVICE-dISKETTE.
43 PRINT:PRINT:PRINT:PRINT:PRINT:PRINT
44 PRINTSPC(7)"([212]HOMAS [210]OEDER, 64'ER-[210]EDAKTION)";
45 GETA$:IFA$<>CHR$(13)THEN45
46 SYS2048